unit upascashdrawerso00;
{$I \source.75\common\LogOption.txt}

interface
uses
  upascashdrawerso;

type
  EOupascashdrawerso00 = class(EOupascashdrawerso)
  private
    FResultCode: Integer;
    FResultCodeExtended: Integer;
    FOpenResult: Integer;

  protected
    // Common Properties getter/setter
    function getAutoDisable: Boolean; override;
    function getBinaryConversion: Integer; override;
    function getCapCompareFirmwareVersion: Boolean; override;
    function getCapPowerReporting: Integer; override;
    function getCapStatisticsReporting: Boolean; override;
    function getCapUpdateFirmware: Boolean; override;
    function getCapUpdateStatistics: Boolean; override;
    function getCheckHealthText: String; override;
    function getClaimed: Boolean; override;
    function getControlObjectDescription: String; override;
    function getControlObjectVersion: Integer; override;
    function getDataCount: Boolean; override;
    function getDataEventEnabled: Boolean; override;
    function getDeviceControlDescription: String; override;
    function getDeviceControlVersion: Integer; override;
    function getDeviceDescription: String; override;
    function getDeviceEnabled: Boolean; override;
    function getDeviceName: String; override;
    function getDeviceServiceDescription: String; override;
    function getDeviceServiceVersion: Integer; override;
    function getFreezeEvents: Boolean; override;
    function getOpenResult: Integer; override;
    function getOutpuID: Integer; override;
    function getPhysicalDeviceDescription: String; override;
    function getPhysicalDeviceName: String; override;
    function getPowerNotify: Integer; override;
    function getPowerState: Integer; override;
    function getResultCode: Integer; override;
    function getResultCodeExtended: Integer; override;
    function getServiceObjectDescription: String; override;
    function getServiceObjectVersion: Integer; override;
    function getState: Integer; override;
    procedure setAutoDisable(Value: Boolean); override;
    procedure setBinaryConversion(Value: Integer); override;
    procedure setDataEventEnabled(Value: Boolean); override;
    procedure setDeviceEnabled(Value: Boolean); override;
    procedure setFreezeEvents(Value: Boolean); override;
    procedure setPowerNotify(Value: Integer); override;

    // CashDrawer Properties getter/setter
    function getCapStatus: WordBool; override;
    function getCapStatusMultiDrawerDetect: WordBool; override;
    function getDrawerOpened: WordBool; override;

  public
    // Common Methods
    function CheckHealth(Level: Integer): Integer; override;
    function ClaimDevice(Timeout: Integer): Integer; override;
    function ClearInput: Integer; override;
    function ClearInputProperties: Integer; override;
    function ClearOutput: Integer; override;
    function Close: Integer; override;
    function CompareFirmwareVersion(const FirmwareFileName: WideString; out pResult: Integer): Integer; override;
    function DirectIO(Command: Integer; var pData: Integer; var pString: WideString): Integer; override;
    function Open(const DeviceName: String): Integer; override;
    function ReleaseDevice: Integer; override;
    function ResetStatistics(const StatisticsBuffer: WideString): Integer; override;
    function RetrieveStatistics(var pStatisticsBuffer: WideString): Integer; override;
    function UpdateFirmware(const FirmwareFileName: WideString): Integer; override;
    function UpdateStatistics(const StatisticsBuffer: WideString): Integer; override;

    // CashDrawer Methods
    function OpenDrawer: Integer; override;
    function WaitForDrawerClose(BeepTimeout: Integer; BeepFrequency: Integer; BeepDuration: Integer; BeepDelay: Integer): Integer;  override;

    constructor Create;

  end;

implementation
uses
  AuditLog,
  opos,
  oposcash;

function EOupascashdrawerso00.getCapStatus: WordBool;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getCapStatus', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getAutoDisable: Boolean;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getAutoDisable', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getBinaryConversion: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getBinaryConversion', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := 0;
end;

function EOupascashdrawerso00.getCapCompareFirmwareVersion: Boolean;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getCapCompareFirmwareVersion', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getCapPowerReporting: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getCapPowerReporting', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := 0;
end;

function EOupascashdrawerso00.getCapStatisticsReporting: Boolean;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getCapStatisticsReporting', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getCapStatusMultiDrawerDetect: WordBool;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getCapStatusMultiDrawerDetect', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getCapUpdateFirmware: Boolean;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getCapUpdateFirmware', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getCapUpdateStatistics: Boolean;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getCapUpdateStatistics', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getCheckHealthText: String;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getCheckHealthText', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := '';
end;

function EOupascashdrawerso00.getClaimed: Boolean;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getClaimed', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getControlObjectDescription: String;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getControlObjectDescription', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := '';
end;

function EOupascashdrawerso00.getControlObjectVersion: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getControlObjectVersion', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := 0;
end;

function EOupascashdrawerso00.getDataCount: Boolean;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getDataCount', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getDataEventEnabled: Boolean;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getDataEventEnabled', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getDeviceControlDescription: String;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getDeviceControlDescription', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := '';
end;

function EOupascashdrawerso00.getDeviceControlVersion: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getDeviceControlVersion', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := 0;
end;

function EOupascashdrawerso00.getDeviceDescription: String;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getDeviceDescription', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := '';
end;

function EOupascashdrawerso00.getDeviceEnabled: Boolean;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getDeviceEnabled', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getDeviceName: String;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getDeviceName', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := '';
end;

function EOupascashdrawerso00.getDeviceServiceDescription: String;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getDeviceServiceDescription', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := '';
end;

function EOupascashdrawerso00.getDeviceServiceVersion: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getDeviceServiceVersion', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := 0;
end;

function EOupascashdrawerso00.getDrawerOpened: WordBool;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getDrawerOpened', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getFreezeEvents: Boolean;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getFreezeEvents', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := False;
end;

function EOupascashdrawerso00.getOpenResult: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getOpenResult', '');
  {$ENDIF}

  FOpenResult := opos.OPOS_E_NOSERVICE;
  Result := FOpenResult;
end;

function EOupascashdrawerso00.getOutpuID: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getOutpuID', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := 0;
end;

function EOupascashdrawerso00.getPhysicalDeviceDescription: String;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getPhysicalDeviceDescription', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := '';
end;

function EOupascashdrawerso00.getPhysicalDeviceName: String;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getPhysicalDeviceName', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := '';
end;

function EOupascashdrawerso00.getPowerNotify: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getPowerNotify', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := 0;
end;

function EOupascashdrawerso00.getPowerState: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getPowerState', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := 0;
end;

function EOupascashdrawerso00.getResultCode: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getResultCode', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.getResultCodeExtended: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getResultCodeExtended', '');
  {$ENDIF}

  FResultCodeExtended := opos.OPOS_E_NOSERVICE;
  Result := FResultCodeExtended;
end;

function EOupascashdrawerso00.getServiceObjectDescription: String;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getServiceObjectDescription', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := '';
end;

function EOupascashdrawerso00.getServiceObjectVersion: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getServiceObjectVersion', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := 0;
end;

function EOupascashdrawerso00.getState: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.getState', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := 0;
end;

procedure EOupascashdrawerso00.setAutoDisable(Value: Boolean);
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.setAutoDisable', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
end;

procedure EOupascashdrawerso00.setBinaryConversion(Value: Integer);
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.gesetBinaryConversiontState', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
end;

procedure EOupascashdrawerso00.setDataEventEnabled(Value: Boolean);
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.setDataEventEnabled', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
end;

procedure EOupascashdrawerso00.setDeviceEnabled(Value: Boolean);
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.setDeviceEnabled', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
end;

procedure EOupascashdrawerso00.setFreezeEvents(Value: Boolean);
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.setFreezeEvents', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
end;

procedure EOupascashdrawerso00.setPowerNotify(Value: Integer);
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.setPowerNotify', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
end;

function EOupascashdrawerso00.CheckHealth(Level: Integer): Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.CheckHealth', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.ClaimDevice(Timeout: Integer): Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.ClaimDevice', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.ClearInput: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.ClearInput', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.ClearInputProperties: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.ClearInputProperties', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.ClearOutput: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.ClearOutput', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.Close: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.Close', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.CompareFirmwareVersion(const FirmwareFileName: WideString; out pResult: Integer): Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.CompareFirmwareVersion', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.DirectIO(Command: Integer; var pData: Integer; var pString: WideString): Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.DirectIO', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.Open(const DeviceName: String): Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.Open', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.OpenDrawer: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.OpenDrawer', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.ReleaseDevice: Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.ReleaseDevice', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.ResetStatistics(const StatisticsBuffer: WideString): Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.ResetStatistics', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.RetrieveStatistics(var pStatisticsBuffer: WideString): Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.RetrieveStatistics', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.UpdateFirmware(const FirmwareFileName: WideString): Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.UpdateFirmware', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.UpdateStatistics(const StatisticsBuffer: WideString): Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.UpdateStatistics', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;

function EOupascashdrawerso00.WaitForDrawerClose(BeepTimeout: Integer; BeepFrequency: Integer; BeepDuration: Integer; BeepDelay: Integer): Integer;
begin
  {$IFDEF LOGUNITTEST}
  AuditLog.EventLog(AuditLog.etDUNIT, EOupascashdrawerso00.ClassName + '.WaitForDrawerClose', '');
  {$ENDIF}

  FResultCode := opos.OPOS_E_NOSERVICE;
  Result := FResultCode;
end;


constructor EOupascashdrawerso00.Create;
begin
  FResultCode := opos.OPOS_E_NOSERVICE;

end;

end.

